Celestin Apprentice 2/Apprentice-Release2.iso/Tools/Languages/Parallaxis 2.11/rot.xrf

Text File | 1992-01-09 | 3.5 KB | 388 lines | [TEXT/PARZ]

423310825

Q rot.p
W
167 958 257 107 1
NOT 4
RIGHT 7
DRAWCARD 8
SCALAR 9
DIV 10
IN_CONNECTED 12
EOL 269
SEND 14
CHR 15
GREEN 272
EXCL 18
LOOP 19
CHAR 276
LAST 533
ELSE 31
SIRANDOM 33
CAP 35
UNTIL 36
STRCMP 37
WRITEREAL 39
POINTER 40
OF 43
READCARD 44
REPEAT 46
VBRANDOM 48
WRITE 49
TRUNC 50
DIM1 307
LOAD 51
WRITEBOOL 308
DIM2 565
OR 55
BUFFER 312
ARCTAN2 57
SUM 59
SIN 61
DRAWFIXPT 62
ARCCOS 63
SIZE 64
PROCEDURE 70
REDUCE 72
SCRANDOM 329
TO 73
DRAW 330
WRITELN 587
VECTOR 74
I 331
J 75
DEC 77
SELECTWINDOW 334
CONST 78
FLOAT 82
LINE 83
PICTURE 340
BOOLEAN 87
HALT 88
FIRST 89
X 346
Y 90
OUT_LINECONNECTED 92
MOVETO 349
FALSE 93
SQRT 94
OPENWINDOW 95
TERMCH 352
OPENINPUT 98
SRRANDOM 103
INCL 360
AND 104
MOD 361
ARRAY 108
SIZE2 110
ELSIF 111
IMAGE_ROTATION 112
WRITECARD 113
TAN 117
ABS 120
FROM 124
NIL 125
CLOSEINPUT 382
SETPIXEL 126
ARCSIN 130
VIRANDOM 131
RECORD 135
OPENOUTPUT 137
COLOR 394
VAL 140
PIC 141
DRAWINT 145
TYPE 146
VAR 403
RECEIVE 148
WITH 149
SET 153
PI 410
END 154
EXIT 411
WRITESTRING 155
CLOSEWINDOW 157
FOR 159
DO 160
SYSTEM 417
STORE 161
M_SIZE 418
ENDPARALLEL 165
OUT_CONNECTED 167
TRACE 424
MAX 168
NOTRACE 425
VCRANDOM 170
DISPOSE 427
WRITEINT 684
SETCOLOR 171
IF 172
CASE 174
B2 431
THEN 179
IN 180
UP 181
ARCTAN 186
DRAWREAL 191
READSTRING 192
PIC_SIZE 449
ORD 193
PROPAGATE 195
PARALLEL 196
DOWN 453
CLOSEOUTPUT 199
VRRANDOM 201
INC 203
DRAWBOOL 460
SBRANDOM 207
EXP 208
TRUE 465
EVEN 209
WHILE 210
DEBUG 467
BY 213
RETURN 470
CONNECTION 215
CARDINAL 472
BLUE 216
LEFT 220
NEW 222
IN_LINECONNECTED 224
BEGIN 225
READINT 227
READREAL 484
PRODUCT 230
STREQ 233
CONFIGURATION 236
BITSET 493
ODD 237
ID_NO 239
READBOOL 496
READ 241
MIN 243
LN 244
WRITEFIXPT 246
GETPIXEL 248
WINDOWSIZE 505
REAL 249
COS 251
DONE 252
RED 253
INTEGER 256
DRAWSTRING 513

S 118
8 7 5 1
6 307 18 1
6 565 18 2
6 312 18 4
6 346 18 6
6 90 18 7
6 394 18 3
6 431 18 5
8 181 5 3
8 453 5 4
8 220 5 2
5 331 18 3
5 75 18 4
5 340 1 5
5 110 18 2
1 112
4 141 8 1
2 418 18 8
5 449 18 1
12 8
2 269 16 10
11 12
11 15
12 18
11 533
3 276 16
11 33
11 35
11 37
12 39
12 44
11 48
12 49
11 50
12 308
11 57
11 59
11 61
12 62
11 63
11 64
11 329
12 587
12 330
12 334
12 77
11 82
12 83
3 87 17
12 88
11 89
12 349
11 92
2 93 17 0
11 94
13 352
11 95
12 98
12 360
11 103
12 113
11 117
11 120
12 382
2 125 11 1
12 126
11 130
11 131
3 394 10
12 137
11 140
12 145
2 410 14 2
12 155
12 157
12 424
11 167
12 425
11 168
12 684
12 427
11 170
12 171
11 186
12 191
12 192
11 193
12 199
11 201
12 460
12 203
11 207
2 465 17 1
11 208
11 209
12 467
3 472 15
12 222
11 224
12 484
12 227
11 230
11 233
3 493 13
11 237
12 496
13 239
12 241
11 243
11 244
12 246
12 505
11 248
3 249 14
11 251
13 252
12 513
3 256 18

G 4
1 11 4 0 141 1 177 177 178
1 11 4 0 141 1 100 100 175
1 11 4 0 141 1 96 96 97
12 8 0 0 112 0 1 1 202

Z 56
86 201 202
83 196 197
81 185 194
80 184 196
80 182 196
79 181 199
79 179 199
78 178 179
76 176 178
74 175 176
72 174 175
66 171 172
66 167 173
64 161 167
69 156 157
69 152 158
67 146 152
64 140 174
63 139 140
57 136 137
57 132 138
55 126 132
60 121 122
60 117 123
58 111 117
55 105 139
54 104 105
52 102 104
51 100 102
50 99 175
49 98 99
48 199 201
48 97 201
46 95 97
43 92 93
41 81 90
40 80 92
40 78 92
39 77 95
39 75 95
38 74 75
37 73 74
36 72 73
32 65 70
31 60 65
30 59 72
30 57 72
28 46 55
27 45 57
27 43 57
24 30 39
23 29 41
23 27 41
22 26 43
22 24 43
20 23 24

T 18
6 0 3 4
11 0 18 0 7
11 0 18 0 7
6 0 2 18
13 0 141
11 0 18 0 7
11 0 18 0 7
6 0 7 9
6 0 6 0
7 394 1
10 125 0
11 0 18 0 31
9 493 12 0 31
4 249
11 472 18 0 32767
2 276
1 87
3 256

M 3
253 15 0
272 15 0
216 15 1

C 2
1 "NIL"
1 "3.14159"

E